SET QUOTED_IDENTIFIER ON
GO
SET ANSI_NULLS ON
GO
CREATE PROCEDURE [dbo].[SP_TCDOCU_PGGR_Q01]  
/*-------------------------------------------------------*/  
/*---Empresa               OFISIS S.A.                --*/  
/*---CLIEnte               OFISIS                 --*/  
/*---Sistema               Tesoreria                  --*/  
/*---M®dulo                Empresa                    --*/  
/*---Programa              REPORTE PAGARES Y GARANTIAS   --*/  
/*---Script                SP_TCDOCU_PGGR_Q01.sql     --*/  
/*---Nombre SP             SP_TCDOCU_PGGR_Q01         --*/  
/*---Desarrollado por      Aldo Escobar     --*/  
/*---Fecha Creaci®n        23/02/2012                --*/  
/*---Base Datos            SQL          --*/  
/*---Versi®n               8.0                        --*/  
/*---Invoca a SP                                      --*/  
/*-------------------------------------------------------*/  
  
/*-------------------------------------------------------*/  
/*---Modificado 1 por     :    --*/  
/*---Fecha Modificaci®n   :     --*/   
/*---Detalle Modificaci®n :  --*/  
/*-------------------------------------------------------*/  
/*-------------------------------------------------------*/  
/*---Drop Proc SP_TCDOCU_PGGR_Q01                      --*/  
/*---Grant execute on SP_TCDOCU_PGGR_Q01 to public         --*/   
/*--- SP_TCDOCU_PGGR_Q01 '01', '2', 'T', 'T','2012-01-01', '2012-02-25'  --*/  
/*-------------------------------------------------------*/  
@ISCO_EMPR TD_VC_002,
@ISTI_REPO TD_VC_001,  --'1' Resumido, '2' Detallado
@ISST_DOCU TD_VC_001,
@ISST_ESTA TD_VC_001,

@IDFE_INIC TD_DT_001,
@IDFE_FINA TD_DT_001
 

As  
DECLARE  
@VSNU_ANNO VARCHAR(4),  
@VSNU_MESE VARCHAR(2),  
@VNIM_TOTA_CUOT  TD_NU_016_004,
@VNIM_TOTA_PAGA  TD_NU_016_004,
@VSTI_DOCU_EVAL VARCHAR(3),
@VDFECH_ACTU    TD_DT_001,
 @CSCO_EMPR  TD_VC_002,
  @CSNU_CORR_DOCU TD_VC_008, 
  @CSCO_PROV     TD_VC_020, 
  @CSTI_DOCU TD_VC_003, 
  @CSNU_DOCU TD_VC_020, 
  @CSCO_MONE TD_VC_003, 
  @CDFE_EMIS TD_DT_001, 
  @CNFA_TIPO_CAMB TD_NU_015_006, 
  @CSNU_ANNO TD_VC_004, 
  @CSNU_MESE TD_VC_002, 
  @CNIM_TOTA TD_NU_016_004, 
  @CNNU_CUOT TD_IN_001,
  @CSCO_TIPO_OPER TD_VC_003, 
  @CSCO_UNID_CONC TD_VC_003, 
  @CSDE_OBSE      TD_VC_100, 
  @CSTI_SITU      TD_VC_003, 
  @CSST_CONT      TD_VC_001, 
  @CSNU_ASTO      TD_VC_010, 
  @CNNU_PROC      TD_IN_001,
  --VARIABLES CURSOR2  
   @CSCO_EMPR_2      TD_VC_002,
    @CSCO_PROV_2     TD_VC_020, 
    @CSTI_DOCU_2     TD_VC_003, 
    @CSNU_DOCU_PROV  TD_VC_020, 
    @CSIM_TOTA       TD_NU_016_004, 
    @CSIM_TOTA_PAGA  TD_NU_016_004,
    @CSNU_DOCU_ORIG  TD_VC_020   
      


 CREATE TABLE #TWDOCU_PGGR_Q01_1           
 ( CO_EMPR      varchar(3) NULL,          
   CO_TIPO_DOCU varchar(3)  NULL ,          
   NU_DOCU_PROV varchar(20)  NULL,          
   CO_PROV      varchar(20) NULL,
   NU_DOCU_ORIG varchar(20)  NULL,
   IM_TOTA_CUOT NUMERIC NULL,
   IM_TOTA_PAGA NUMERIC NULL,
   FE_VENC      DATETIME NULL
   )     
   ---
   
CREATE TABLE #TWDOCU_PGGR_Q01_2           
 ( CO_EMPR      varchar(3) NULL,          
   CO_TIPO_DOCU varchar(3)  NULL ,          
   NU_DOCU_PROV varchar(20)  NULL,          
   CO_PROV varchar(20) NULL ,          
   NU_ASTO VARCHAR(15) NULL,          
   FE_REPO datetime NULL,          
   CO_MONE varchar(03) NULL,          
   FA_TIPO_CAMB numeric(9,4) NULL,          
   CO_CAJA varchar(8) NULL,          
   NU_AMAR varchar(10) NULL,          
   NU_CANJ varchar(8) NULL,          
   NU_RENO varchar(8) NULL,          
   CO_BANC varchar(3) NULL,          
   NU_CNTA_BANC varchar(100) NULL,              
   NU_COMP_CABA varchar(20) NULL,           
   IM_CXPA numeric(16,4) NULL,          
   IM_PAGO numeric(16,4) NULL,          
   TI_DETA varchar(1) NULL,
   SB_MONE varchar(3) NULL, 
   DE_MONE varchar(50) NULL, 
 )  
 
 CREATE TABLE #TWDOCU_PGGR_Q01_3           
 ( CO_EMPR      varchar(3) NULL,          
   CO_TIPO_DOCU varchar(3)  NULL , 
   NU_DOCU_ORIG varchar(20)  NULL,    
   NU_DOCU_PROV varchar(20)  NULL,          
   CO_PROV varchar(20) NULL ,          
   NU_ASTO VARCHAR(15) NULL,          
   FE_REPO datetime NULL,          
   CO_MONE varchar(03) NULL,          
   FA_TIPO_CAMB numeric(9,4) NULL,          
   CO_CAJA varchar(8) NULL,          
   NU_AMAR varchar(10) NULL,          
   NU_CANJ varchar(8) NULL,          
   NU_RENO varchar(8) NULL,          
   CO_BANC varchar(3) NULL,          
   NU_CNTA_BANC varchar(100) NULL,              
   NU_COMP_CABA varchar(20) NULL,           
   IM_CXPA numeric(16,4) NULL,          
   IM_PAGO numeric(16,4) NULL,          
   TI_DETA varchar(1) NULL,
   SB_MONE varchar(3) NULL, 
   DE_MONE varchar(50) NULL, 
   NO_AUXI varchar(50) NULL, 
   DE_OBSE varchar(100) NULL, 
   FE_VENC datetime NULL
 )   
 
 CREATE TABLE ##TWDOCU_PGGR_Q05_5             
 ( CO_EMPR      varchar(3) NULL,            
   CO_TIPO_DOCU varchar(3)  NULL ,            
   NU_DOCU_PROV varchar(20)  NULL,            
   CO_PROV varchar(20) NULL ,            
   NU_ASTO VARCHAR(15) NULL,            
   FE_REPO datetime NULL,            
   CO_MONE varchar(03) NULL,            
   FA_TIPO_CAMB numeric(9,4) NULL,            
   CO_CAJA varchar(8) NULL,            
   NU_AMAR varchar(10) NULL,            
   NU_CANJ varchar(8) NULL,            
   NU_RENO varchar(8) NULL,            
   CO_BANC varchar(3) NULL,            
   NU_CNTA_BANC varchar(100) NULL,                
   NU_COMP_CABA varchar(20) NULL,             
   IM_CXPA numeric(16,4) NULL,            
   IM_PAGO numeric(16,4) NULL,            
   TI_DETA varchar(1) NULL
 )      
   
BEGIN

  --------VALIDAR LOS DOCUMENTOS  FLAG
  
  IF @ISST_DOCU = 'T' --AGREGAR MACRO PARA EL CASO DE TODOS PENDIENTE
		SELECT @VSTI_DOCU_EVAL = 'PAG'
  IF @ISST_DOCU = 'P'
		SELECT @VSTI_DOCU_EVAL = 'PAG'
  IF @ISST_DOCU = 'G'
		SELECT @VSTI_DOCU_EVAL = 'GAR'
		
  --PENDIENTE AGREGAR sCA_WHER_LOCA
 DECLARE CU_TWDOCU_PGGR_Q01_1 CURSOR FOR          
 SELECT CO_EMPR,NU_CORR_DOCU,CO_PROV,TI_DOCU,NU_DOCU,CO_MONE,FE_EMIS,FA_TIPO_CAMB,NU_ANNO,NU_MESE,IM_TOTA,NU_CUOT,
 CO_TIPO_OPER,CO_UNID_CONC,DE_OBSE,TI_SITU,ST_CONT,NU_ASTO,NU_PROC 
 FROM TCDOCU_PGGR
 WHERE CO_EMPR = @ISCO_EMPR
 AND FE_EMIS >= @IDFE_INIC
 AND FE_EMIS <= @IDFE_FINA
 AND TI_DOCU =  @VSTI_DOCU_EVAL
 
 Open CU_TWDOCU_PGGR_Q01_1          
 Fetch  CU_TWDOCU_PGGR_Q01_1     INTO  
  @CSCO_EMPR, @CSNU_CORR_DOCU, @CSCO_PROV, @CSTI_DOCU, @CSNU_DOCU, @CSCO_MONE, @CDFE_EMIS, @CNFA_TIPO_CAMB, @CSNU_ANNO, @CSNU_MESE, @CNIM_TOTA, @CNNU_CUOT,
  @CSCO_TIPO_OPER, @CSCO_UNID_CONC, @CSDE_OBSE, @CSTI_SITU, @CSST_CONT, @CSNU_ASTO, @CNNU_PROC           
 WHILE @@FETCH_STATUS = 0          
 Begin          
        
        
SELECT @VNIM_TOTA_PAGA =  0
SELECT @VNIM_TOTA_CUOT =  0
 
 ---CALCULO IMPORTES --
 	SELECT  @VNIM_TOTA_CUOT = SUM(T1.IM_CUOT), 
			@VNIM_TOTA_PAGA = SUM(T2.IM_PAGA)
	From 	TDDOCU_PGGR T1, TMDOCU_PROV T2
	Where 	T2.CO_EMPR        = T1.CO_EMPR
		And T2.CO_PROV        = T1.CO_PROV
		And T2.CO_TIPO_DOCU   = T1.TI_DOCU
		And T2.NU_DOCU_PROV   = T1.NU_DOCU+'-'+Replicate('0',3-Len(Convert(VarChar,T1.NU_CUOT_DETA)))+Convert(VarChar,T1.NU_CUOT_DETA)
		
		AND T1.CO_EMPR 		  = @ISCO_EMPR
		And T1.NU_CORR_DOCU   = @CSNU_CORR_DOCU
		And T1.CO_PROV        = @CSCO_PROV
		And T1.TI_DOCU   	  = @CSTI_DOCU
		AND T1.NU_DOCU		  = @CSNU_DOCU
		
-----
	SELECT @VNIM_TOTA_PAGA = ISNULL(@VNIM_TOTA_PAGA,0)
	SELECT @VNIM_TOTA_CUOT = ISNULL(@VNIM_TOTA_CUOT,0)
-----
   
 ----------VALIDAR ESTADO DOCUMENTO FLAG
 --AGREGAR EN LA TEMPORAL - TODOS LOS ESTADOS
 IF @ISST_ESTA = 'T'
 BEGIN
      --INSERTAR TODOS LOS DOCUMENTOS
		INSERT INTO #TWDOCU_PGGR_Q01_1           
		(CO_EMPR, CO_PROV, CO_TIPO_DOCU,  NU_DOCU_PROV, NU_DOCU_ORIG, IM_TOTA_CUOT, IM_TOTA_PAGA , FE_VENC  ) 
		SELECT  @CSCO_EMPR, @CSCO_PROV, @CSTI_DOCU, T2.NU_DOCU_PROV, @CSNU_DOCU, T2.IM_TOTA, T2.IM_PAGA, T2.FE_VENC
		From 	TDDOCU_PGGR T1, TMDOCU_PROV T2
		Where 	T2.CO_EMPR        = T1.CO_EMPR
			And T2.CO_PROV        = T1.CO_PROV
			And T2.CO_TIPO_DOCU   = T1.TI_DOCU
			And T2.NU_DOCU_PROV   = T1.NU_DOCU+'-'+Replicate('0',3-Len(Convert(VarChar,T1.NU_CUOT_DETA)))+Convert(VarChar,T1.NU_CUOT_DETA)
			
			AND T1.CO_EMPR 		  = @ISCO_EMPR
			And T1.NU_CORR_DOCU   = @CSNU_CORR_DOCU
			And T1.CO_PROV        = @CSCO_PROV
			And T1.TI_DOCU   	  = @CSTI_DOCU
			AND T1.NU_DOCU		  = @CSNU_DOCU
			
 END
 --AGREGAR EN LA TEMPORAL SOLO AQUELLOS QUE ESTAN PAGADOS 
 
 IF @ISST_ESTA = 'P'
 BEGIN
 
	SELECT @VNIM_TOTA_PAGA = ISNULL(@VNIM_TOTA_PAGA,0)
	SELECT @VNIM_TOTA_CUOT = ISNULL(@VNIM_TOTA_CUOT,0)
		
	IF @VNIM_TOTA_CUOT = @VNIM_TOTA_PAGA
	BEGIN 
	    --INSERTAR LOS DOCUMENTOS TOTALMENTE PAGADOS
		INSERT INTO #TWDOCU_PGGR_Q01_1           
		(CO_EMPR, CO_PROV, CO_TIPO_DOCU,  NU_DOCU_PROV, NU_DOCU_ORIG, IM_TOTA_CUOT, IM_TOTA_PAGA, FE_VENC  ) 
		SELECT  @CSCO_EMPR, @CSCO_PROV, @CSTI_DOCU, T2.NU_DOCU_PROV, @CSNU_DOCU , T2.IM_TOTA, T2.IM_PAGA, T2.FE_VENC
		From 	TDDOCU_PGGR T1, TMDOCU_PROV T2
		Where 	T2.CO_EMPR        = T1.CO_EMPR
			And T2.CO_PROV        = T1.CO_PROV
			And T2.CO_TIPO_DOCU   = T1.TI_DOCU
			And T2.NU_DOCU_PROV   = T1.NU_DOCU+'-'+Replicate('0',3-Len(Convert(VarChar,T1.NU_CUOT_DETA)))+Convert(VarChar,T1.NU_CUOT_DETA)
			
			AND T1.CO_EMPR 		  = @ISCO_EMPR
			And T1.NU_CORR_DOCU   = @CSNU_CORR_DOCU
			And T1.CO_PROV        = @CSCO_PROV
			And T1.TI_DOCU   	  = @CSTI_DOCU
			AND T1.NU_DOCU		  = @CSNU_DOCU
    
	  END
		
 END
 --AGREGAR EN LA TEMPORAL SOLO AQUELLOS QUE NO ESTAN PAGADOS
 IF @ISST_ESTA = 'N'
 BEGIN
		
	
	IF @VNIM_TOTA_CUOT != @VNIM_TOTA_PAGA
	BEGIN 
	    --INSERTAR LOS DOCUMENTOS QUE NO ESTAN TOTALMENTE PAGADOS
		INSERT INTO #TWDOCU_PGGR_Q01_1           
		(CO_EMPR, CO_PROV, CO_TIPO_DOCU,  NU_DOCU_PROV, NU_DOCU_ORIG, IM_TOTA_CUOT, IM_TOTA_PAGA, FE_VENC  ) 
		SELECT  @CSCO_EMPR, @CSCO_PROV, @CSTI_DOCU, T2.NU_DOCU_PROV, @CSNU_DOCU,  T2.IM_TOTA, T2.IM_PAGA, T2.FE_VENC
		From 	TDDOCU_PGGR T1, TMDOCU_PROV T2
		Where 	T2.CO_EMPR        = T1.CO_EMPR
			And T2.CO_PROV        = T1.CO_PROV
			And T2.CO_TIPO_DOCU   = T1.TI_DOCU
			And T2.NU_DOCU_PROV   = T1.NU_DOCU+'-'+Replicate('0',3-Len(Convert(VarChar,T1.NU_CUOT_DETA)))+Convert(VarChar,T1.NU_CUOT_DETA)
			
			AND T1.CO_EMPR 		  = @ISCO_EMPR
			And T1.NU_CORR_DOCU   = @CSNU_CORR_DOCU
			And T1.CO_PROV        = @CSCO_PROV
			And T1.TI_DOCU   	  = @CSTI_DOCU
			AND T1.NU_DOCU		  = @CSNU_DOCU
    
	 END

 END

   If @@error <> 0                      
         Begin                      
     Close CU_TWDOCU_PGGR_Q01_1                      
     Deallocate CU_TWDOCU_PGGR_Q01_1                      
               rollback tran                      
         return                      
            End                      
                
              
Fetch  CU_TWDOCU_PGGR_Q01_1                     
Into               
  @CSCO_EMPR, @CSNU_CORR_DOCU, @CSCO_PROV, @CSTI_DOCU, @CSNU_DOCU, @CSCO_MONE, @CDFE_EMIS, @CNFA_TIPO_CAMB, @CSNU_ANNO, @CSNU_MESE, @CNIM_TOTA, @CNNU_CUOT,
  @CSCO_TIPO_OPER, @CSCO_UNID_CONC, @CSDE_OBSE, @CSTI_SITU, @CSST_CONT, @CSNU_ASTO, @CNNU_PROC  
  
End                            
                            
Close CU_TWDOCU_PGGR_Q01_1                  
Deallocate CU_TWDOCU_PGGR_Q01_1

---FIN CURSOR 1

----SELECT TW
	IF @ISTI_REPO = '1'   --RESUMIDO
	BEGIN
	DROP TABLE ##TWDOCU_PGGR_Q05_5
	
	SELECT T1.CO_EMPR,T1.CO_PROV,MAX(T3.NO_AUXI),T1.TI_DOCU, T1.NU_DOCU, 
	       MAX(T1.FE_EMIS),MAX(T2.FE_VENC), MAX(T1.IM_TOTA),SUM(T2.IM_TOTA_PAGA) , MAX(T1.CO_MONE), MAX(T1.DE_OBSE)
	FROM  TCDOCU_PGGR T1, #TWDOCU_PGGR_Q01_1 T2, TMAUXI_EMPR T3
	WHERE T1.CO_EMPR = T2.CO_EMPR 
	AND   T1.CO_PROV = T2.CO_PROV
	AND   T1.TI_DOCU = T2.CO_TIPO_DOCU
	AND   T1.NU_DOCU = T2.NU_DOCU_ORIG
	AND   T1.CO_EMPR = T3.CO_EMPR
	AND   T3.TI_AUXI_EMPR = 'P'
	AND   T3.CO_AUXI_EMPR =  T1.CO_PROV
	GROUP BY T1.CO_EMPR,T1.CO_PROV,T1.TI_DOCU,T1.NU_DOCU
	
	RETURN  
	
	END
	
	ELSE IF @ISTI_REPO = '2'  --DETALLADO
	BEGIN
		--BORRAR TABLA DEL HISTORICO X DOC - CUOTA
		
		SELECT @VDFECH_ACTU = GETDATE()
	-- CURSOR 2 
		DECLARE CU_TWDOCU_PGGR_Q01_2 CURSOR FOR   
		SELECT T1.CO_EMPR,T1.CO_PROV,T1.TI_DOCU, T2.NU_DOCU_PROV, T1.IM_TOTA, T2.IM_TOTA_PAGA, T1.NU_DOCU
		FROM TCDOCU_PGGR T1, #TWDOCU_PGGR_Q01_1 T2
		WHERE T1.CO_EMPR = T2.CO_EMPR 
		AND   T1.CO_PROV = T2.CO_PROV
		AND   T1.TI_DOCU = T2.CO_TIPO_DOCU
		AND   T1.NU_DOCU = T2.NU_DOCU_ORIG
		
		Open CU_TWDOCU_PGGR_Q01_2          
		Fetch  CU_TWDOCU_PGGR_Q01_2     INTO  
		  @CSCO_EMPR_2, @CSCO_PROV_2, @CSTI_DOCU_2, @CSNU_DOCU_PROV, @CSIM_TOTA, @CSIM_TOTA_PAGA,@CSNU_DOCU_ORIG     
		 WHILE @@FETCH_STATUS = 0          
		 Begin  
			
			DELETE ##TWDOCU_PGGR_Q05_5
			 
			EXEC SP_TMDOCU_PGGR_Q25 @CSCO_EMPR_2, @CSCO_PROV_2,@CSTI_DOCU_2, @CSNU_DOCU_PROV, @VDFECH_ACTU,'P'  
	   	  -----------	
		  INSERT INTO #TWDOCU_PGGR_Q01_2(
		  CO_EMPR,   CO_TIPO_DOCU,   NU_DOCU_PROV,CO_PROV, 
		  NU_ASTO,   CO_MONE,        SB_MONE, DE_MONE, 
		  FE_REPO,   CO_BANC,        NU_CNTA_BANC, CO_CAJA, 
		  NU_COMP_CABA, NU_AMAR,     NU_CANJ, NU_RENO, IM_CXPA, IM_PAGO,            
		  FA_TIPO_CAMB,  T1.TI_DETA   
		  )
		  SELECT T1.CO_EMPR, T1.CO_TIPO_DOCU, T1.NU_DOCU_PROV, T1.CO_PROV, T1.NU_ASTO, T1.CO_MONE,           
		  T2.SB_MONE, T2.DE_MONE, T1.FE_REPO, ISNULL(T1.CO_BANC, ''),         
		  ISNULL(T1.NU_CNTA_BANC, ''), ISNULL(T1.CO_CAJA, ''), ISNULL( T1.NU_COMP_CABA, ' '), ISNULL( T1.NU_AMAR, ' '),           
		  ISNULL(T1.NU_CANJ, ''), ISNULL(T1.NU_RENO, ''), ISNULL( T1.IM_CXPA, 0 ), ISNULL( T1.IM_PAGO, 0),            
		  ISNULL(T1.FA_TIPO_CAMB, 0),  T1.TI_DETA          
		  FROM ##TWDOCU_PGGR_Q05_5 T1, TTMONE T2          
		  WHERE T1.CO_MONE = T2.CO_MONE          
		  ORDER BY T1.FE_REPO, T1.CO_TIPO_DOCU, T1.NU_DOCU_PROV   

		--If @@error <> 0                      
  --       Begin                      
		--	 Close CU_TWDOCU_PGGR_Q01_2                      
		--	 Deallocate CU_TWDOCU_PGGR_Q01_2                      
		--     rollback tran                      
  --       return                      
  --          End                      
                         
		Fetch  CU_TWDOCU_PGGR_Q01_2                     
		Into               
		@CSCO_EMPR_2, @CSCO_PROV_2, @CSTI_DOCU_2, @CSNU_DOCU_PROV, @CSIM_TOTA, @CSIM_TOTA_PAGA,@CSNU_DOCU_ORIG   
		End                            
                            
		Close CU_TWDOCU_PGGR_Q01_2                  
		Deallocate CU_TWDOCU_PGGR_Q01_2
	--VISTA = AL DEL HISTORIA DE DOCUMENTO --QRP
	-- COLOCAR EN APT

	---
	
	 INSERT INTO #TWDOCU_PGGR_Q01_3(
	  CO_EMPR,   CO_TIPO_DOCU,   NU_DOCU_ORIG, NU_DOCU_PROV, CO_PROV, 
	  NU_ASTO,   CO_MONE,        SB_MONE, DE_MONE, 
	  FE_REPO,   CO_BANC,        NU_CNTA_BANC, CO_CAJA, 
	  NU_COMP_CABA, NU_AMAR,     NU_CANJ, NU_RENO, IM_CXPA, IM_PAGO,            
	  FA_TIPO_CAMB,  TI_DETA , NO_AUXI, DE_OBSE, FE_VENC
	  )
    SELECT T1.CO_EMPR,T1.TI_DOCU, T1.NU_DOCU, T1.NU_DOCU , T1.CO_PROV,
         NULL, MAX(T1.CO_MONE),  NULL, NULL, 
		 MAX(T1.FE_EMIS),  NULL,  NULL,  NULL, 
		 NULL,  NULL,  NULL,  NULL, MAX(T1.IM_TOTA),SUM(T2.IM_TOTA_PAGA),            
		 NULL,   1, MAX(T3.NO_AUXI),MAX(T1.DE_OBSE), MAX(T2.FE_VENC) 			
	FROM TCDOCU_PGGR T1, #TWDOCU_PGGR_Q01_1 T2,  TMAUXI_EMPR T3		
	WHERE T1.CO_EMPR = T2.CO_EMPR		
	AND   T1.CO_PROV = T2.CO_PROV		
	AND   T1.TI_DOCU = T2.CO_TIPO_DOCU		
	AND   T1.NU_DOCU = T2.NU_DOCU_ORIG		
	AND   T1.CO_EMPR = T3.CO_EMPR			
	AND   T3.TI_AUXI_EMPR = 'P'				
	AND   T3.CO_AUXI_EMPR =  T1.CO_PROV		
	GROUP BY T1.CO_EMPR,T1.CO_PROV,T1.TI_DOCU,T1.NU_DOCU
	UNION ALL
	SELECT 
	     CO_EMPR,    CO_TIPO_DOCU, LEFT(NU_DOCU_PROV,LEN(NU_DOCU_PROV)-4) AS NU_DOCU,  NU_DOCU_PROV,  CO_PROV, 
		 NU_ASTO,    CO_MONE,    SB_MONE, DE_MONE, 
		 FE_REPO,  CO_BANC,   NU_CNTA_BANC,  CO_CAJA, 
		 NU_COMP_CABA,  NU_AMAR,  NU_CANJ,  NU_RENO,  IM_CXPA,  IM_PAGO,            
		 FA_TIPO_CAMB,   2, NULL, NULL, NULL	
    FROM #TWDOCU_PGGR_Q01_2
    WHERE TI_DETA != 1
    ---
       	DROP TABLE ##TWDOCU_PGGR_Q05_5
   ---SELECT FINAL SE AÑADIO COLUMNA NU_DOCU_ORIG---
   
   --SELECT  CO_EMPR,   CO_TIPO_DOCU,   NU_DOCU_ORIG, NU_DOCU_PROV, CO_PROV, 
	  --NU_ASTO,   CO_MONE,        SB_MONE, DE_MONE, 
	  --FE_REPO,   CO_BANC,        NU_CNTA_BANC, CO_CAJA, 
	  --NU_COMP_CABA, NU_AMAR,     NU_CANJ, NU_RENO, IM_CXPA, IM_PAGO,            
	  --FA_TIPO_CAMB,  TI_DETA  
   --FROM #TWDOCU_PGGR_Q01_3  
   --ORDER BY CO_EMPR,CO_TIPO_DOCU,CO_PROV,NU_DOCU_ORIG,NU_DOCU_PROV 
   --RETURN  
   SELECT CO_EMPR,   CO_PROV,  NO_AUXI, CO_TIPO_DOCU,   NU_DOCU_ORIG, NU_DOCU_PROV,
		  CO_MONE,   FE_REPO , FE_VENC ,   
		  CO_BANC +' '+ NU_CNTA_BANC +' '+ CO_CAJA +' '+ NU_COMP_CABA +' '+ NU_AMAR +' '+ NU_CANJ +' '+ NU_RENO AS DETALLE,
		  IM_CXPA, IM_PAGO,            
		  TI_DETA,
		  DE_OBSE
   FROM #TWDOCU_PGGR_Q01_3  
   ORDER BY CO_EMPR,CO_TIPO_DOCU,CO_PROV,NU_DOCU_ORIG,NU_DOCU_PROV 
   RETURN 
		
   END
   

END

GO
